home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / aminet / dev / gcc / libnix.lha / gnu / lib / libnix / sources.lha / nix / setjmp / setjmp.c < prev   
Encoding:
Text File  |  1994-04-10  |  400 b   |  10 lines
  1. asm(".text               ;" /* doing this in c is very hard */
  2.     ".even               ;"
  3.     ".globl _setjmp      ;"
  4.     "_setjmp:            ;"
  5.     "  movel  sp@(4),a0  ;" /* get address of jmp_buf */
  6.     "  movel  sp@,a0@+   ;" /* store returnaddress */
  7.     "  moveml #0xfcfc,a0@;" /* store all registers except scratch */
  8.     "  clrl   d0         ;" /* return 0 */
  9.     "  rts               ;");
  10.